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# 

# Confidential Information 

# Limited Distribution to Authorized Persons Only 

# Created 2000 and Protected as an Unpublished Work 
5 # Under the U . S . Copyright act of 1976. 

# Copyright © 2000-2001 ARC CORES LTD 

# All Rights Reserved 
# 

# SCCS release : %M% %I% %G% 

10 # 

# Description : Script to analyse an ARC assembler file and 

# print frequency of usage stats for various 

# proposed ARC instruction formats 
# 

15 # 

# 

#— 



ft* 

m 



20 

BEGIN { 
out = "C" 

Q #reg = "%r (0 1 1 1 2 | 3 1 13 i 14 1 15 1 16) , " 

4} reg = "%r (0 1 1 1 2 | 3 1 13 1 14 1 15 1 16) { [ A 0-9] | $ ) " 

m 25 regh = "% <r [0-9] + I sp I fp I gp ! blink) < [ A 0-9) | $) ' 
regOl = "%r(0|l) { [ A 0-9] |$)" 
reg23 = "%r (2|3) ( TO-9] |$) " 
regl316 = "%r (13 [ 14 1 15 1 16) ( [ A 0-9] I $) " 
4* pete = 0 

Qij 30 print f >out 

* function nxt() { 

6 J print $0 »out 

yj 35 next 

j« function nxtc{) { 

3^ print "c" $0 »out 

^ next 

M' 40 } 

$1 -= "bl" { 
bl++ 

if ($2 - / prolog_.*/) { 

45 push++ 
nxt () 
} else { 
calls[$23++ 
nxtc ( ) 

50 } 

} 

$1 — "b" { 

b++ 

if ($2 - I epilog__.V) { 

55 pop++ 

nxt () 
} else { 

nxtc ( ) 

} 

60 } 

$1 == "beq" || $1 == "bne" { 
if ($2 !~ /_epilog_.*/) { 
beq++ 
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nxtc { ) 
} else { 
nxt() 

} 

5 } 

$1 "bgt" || $1 == "ble" II $1 == "bge" | | $1 == "bit" { 
if ($2 !~ /_epilog_.*/) { 
bgt++ 
nxtc ( ) 
10 } else { 
nxt () 

} 

} 

$1 == "bhi" || $1 == "bis" [ I $1 == "bhs" | | $1 == "bio" { 
15 if ($2 !- /_epilog_.*/) { 
bhi++ 
nxt () 
} else { 
nxt () 

20 } 

} 

p $1 == "bpl" M $1 « "bmi" { 

$ • if ($2 !~ /_epilog_.*/> { 

03 bpl++ 
^ 25 nxt ( ) 

} else { 
nxt () 

01 } 

.» 30 $1 = "jeq" | | $1 == "jne" { 

if ($2 - "blink") { 
s beq++ 
|=yj nxtc ( ) 

35 nxt() 
} 

3 n $1 == "jgt" || $1 ™ "jle" || $1 == "jge" || $1 == "jit" { 

P if ($2 - "blink") { 

bgt++ 
40 nxtc() 
} 

nxt () 

} 

$1 == "j" { 
45 if ($2 ~ "blink") { 
jblink++ 
nxtc ( ) 

} 

if ($2 - reg) { 
50 jr++ 
nxtc ( ) 

} 

nxt() 

} 

55 $1 == "jl" { 

if ($2 ~ reg) { 
jlr++ 
nxtc ( ) 

} 

60 nxt ( ) 
} 

$1 == "Id" { 
if ($2 - reg) { 
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ld++ 

if ($3 == » [%fp, ") { 

# ldfpa[$4]++ 
ldfp++ 

if (($4+0) >= -32 && ($4+0) <- -4) { 
ldfp32++ 
nxtc ( ) 

} 

nxt () 

} 

if ($3 ~ '*[%sp,") { 

# ldspa[$4]++ 
ldsp++ 

nxt () 

} 

if ($3 == "[%gp, M ) { 
ldgp++ 
nxtc { ) 

} 

if ($3 - reg) { 

# ldra[$4]++ 
ldr++ 

if ($3 ~ A]/ II ($4 ~ [0-9] / && ($4 + 0) >= 0 && ($4+0) < 64)) { 
ldr64++ 
nxtc ( ) 

} 

if (pete) { 

if ($3 ~ A]/ II ($3 ~ regOl && ($4 ~ A[0-9]/ && ($4+0) >= 0 && ($4+0) < 
128))) { 

ldr64p++ 
nxtc ( ) 

} 

if ($3 - A]/ II ($3 - reg23 && ($4 ~ / A [0-9]/ && ($4+0) >= 0 && ($4+0) < 
64))) { 

ldr64p++ 
nxtc ( ) 

} 

if ($3 - A]/ II ($3 - regl316 && ($4 ~ A[0-9]/ && ($4+0) >= 0 && ($4+0) 
32))) { 

ldr64p++ 
nxtc ( ) 

} 

} 

if ($4 ~ reg) { 
ldabc++ 
nxtc ( ) 

} 

nxt () 

} 

} 

nxt () 

} 

$1 == "ldw" { 
if ($2 ~ reg) { 
ldw++ 

if ($3 == "[%fp,") { 
ldwfp++ 

if (($4+0) >= -32 && ($4+0) <= -4) { 
ldwfp32++ 
nxtc ( ) 

} 

nxt() 

} 
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if {$3 — n [%sp # ") { 
ldwsp++ 
nxt () 

} 

5 if ($3 == "[%gp,") { 

ldwgp++ 
nxtc ( ) 

} 

if ($3 ~ reg) { 
10 ldwr++ 

if ($3 ~ A)/ || ($4 - / A [0-9]/ && ($4 + 0). >= 0 && ($4 + 0) < 32)) { 
ldwr32++ 
nxtc ( ) 

} 

15 if ($4 - reg) { 

ldwabc++ 
nxt () 

} 

nxt{) 

20 } 

} 

Q nxt<) 

^ $1 == "ldb" { 

2f 25 if ($2 ~ reg) { 
U ldb++ 

if ($3 == "[%fp,") { 
?; ldbfp++ 

& if (($4+0) >= -32 && ($4+0) <= -4) { 

^ 30 ldbfp32++ 
W nxt ( ) 

a } 

nxt () 

} 

35' if ($3 == "[%sp, w ) { 
ldbsp++ 
nxt () 

} 

Hh if ($3 n [%gp,") { 

' ' 40 ldbgp++ 
nxt() 

} 

if ($3 - reg) { 
ldbr++ 

45 if ($3 ~ A]/ || ($4 ~ /"[0-9]/ && ($4+0) >= 0 && ($4 + 0) < 16) ) { 

ldbrl6++ 
nxtc ( ) 

} 

if ($4 ~ reg) { 
50 ldbabc++ 
nxt () 

} 

nxt () 

} 

55 } 

nxt ( ) 

} 

/st.%blink, \[%sp, 4\J/ { 
stblink++ 
60 nxtc() 
} 

$1 == »st" { 
if ($2 ~ reg) { 
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st++ 

if ($3 ~ w [%fp, n ) { 

# stfpa[$4]++ 
stfp++ 

5 if (($4+0) >= -32 && ($4+0) <= -4) { 

stfp32++ 
nxtc ( ) 

} 

nxt {) 

10 } 

if ($3 == "[%sp,"> { 

# stspa[$4]++ 
stsp++ 

nxt ( ) 

15 } 

if ($ 3 == "[%gp,») { 

stgp++ 
nxt () 

} 

20 if ($3 ~ reg) { 

# stra[$4]++ 
str++ 

© if ($3 - A]/ || ($4 ~ /*[Q-9]/ && ($4+0) >= 0 && ($4+0) < 64)) { 

4) ~ str64++ 
f^h Zj nxtc ( ) 

W nxt ( ) 

W } 

m 30 nxt ( ) 

*4 $1 == "stw" { 

a if ($2 - reg) { 

D stw++ 

tjj 35 if ($3 = "t%fp,") { 

# stwfpa[$4]++ 
^ stwfp++ 

5* if (($4+0) >= -32 && ($4+0) <= -4) { 

stwfp32++ 
40 nxt ( ) 

} 

nxt() 

} 

if ($3 == "[%sp, H ) { 
45 # stwspa[$4]++ 
stwsp++ 
nxt () 

} 

if ($ 3 == »[% gPf «) { 
50 stwgp++ 
nxt () 

} 

if ($3 ~ reg) { 

# stwra[$4]++ 
55 stwr++ 

if ($3 - A]/ || ($4 ~ / A [0-9]/ && ($4+0) >= 0 && ($4 + 0) < 16)) { 
stwrl6++ 
nxtc ( ) 

} 

60 nxt ( ) 

} 

} 

nxt () 
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} 

$1 ™ "stb" { 
if ($2 - reg) { 
stb++ 

5 if ($3 -= "[%fp,") { 

# stbfpa[$4]++ 
stbfp++ 

if (($4+0) >= -32 && ($4+0) <= -4) { 
stbfp32++ 
10 nxt() 
} 

nxt () 

} 

if ($3 =- M [%sp,") { 
15 # stbspa[$4]++ 
stbsp++ 
nxt { ) 

} 

if ($ 3 == »[%gp,") { 
20 stbgp++ 
nxt ( ) 

if ($3 - reg) { 

# stbra[$4]++ 
pj 25 stbr++ 

Cj if ($3 - A]/ || ($4 - [0-9] / && ($4+0) >= 0 && ($4 + 0) < 8} ) { 

Zl stbr8++ 
^ nxtc ( ) 

} 

Q1 30 nxt() 

ai } 

> 

^ nxt ( ) 

} 

yj 35 $1 == "mov.f" { 
Lh if ($2 == "0," && $3 ~ reg) { 

dft movfOr++ 
nxtc ( ) 

} if ($2 == "0," && $3 ~ regh) { 
movfOh++ 
nxtc { ) 

} 

nxt () 

} 

45 $1 == "mov" { 

if ($3 ~ / A -?[0-9]/) { 
movi++ 
movia[$3]++ 
if ($2 - reg) { 
50 if ($3 >= 0 && $3 < 64) { 

movi64++ 
nxtc ( ) 

} 

if (pete) { 

55 if ($2 ~ regOl && $3 >= 0 && $3 < 128) { 

movi64p++ 
nxtc ( ) 

} 

if ($2 ~ reg23 && $3 >= 0 && $3 < 64) { 
60 movi64p++ 
nxtc ( ) 

} 

if ($2 ~ reg!316 && $3 0 && $3 < 32) { 



fc?sj 
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movi64p++ 
nxtc ( ) 

} 

} 

5 if ($3 < -256 I I $3 > 2Sb) { 

ldrpc++ 
nxtc ( ) 

} 

} 

10 nxt<) 
} 

if ($3 ~ reg) { 
if ($2 ~ reg) { 
movr++ 
15 nxtc() 
} 

} 

if ($2 ~ reg) { 
if ($3 ~ regh) { 
20 movrh++ 
nxtc ( ) 

M } 

yp > 

m if ($2 - regh) { 

S! 25 if ($3 ~ reg) { 

^ movhr++ 

03 nxtc ( ) 

^(n } 

01 } 

30 if ($3 !- /*%/ && $2 - reg) { 
ldrpc++ 
9 nxtc() 

0 - ) 
U „ nxt{) 

$1 == "add" { 

^ if ($2 == $3 || $2 == {$3 ",") || $2 == ($4 ",")) { 

0 if {$4 - /*-?[0-9]/) { 

addi++ 
40 # addia[$4]++ 

if ($3 ~ reg) { 
if ($4 >= -32 && $4 < 0) { 
subi32++ 
nxtc ( ) 

45 } 

if ($4 >= o && $4 < 32) { 
addi32++ 
nxtc ( ) 

} 

50 } 

} 

if {$2 - reg && $3 - reg && $4 - reg) { 
addaab++ 
nxtc ( ) 

55 } 

if ($2 - reg && $3 - reg && $4 - regh) { 
addrrh++ 
nxtc ( ) 

} 

60 if ($2 - reg && $3 - regh && $4 - reg) { 

addrrh++ 
nxtc ( ) 

} 
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} 

if ($4 ~ / A -?[0-9]/) { 
if ($2 - reg) { 
if ($3 - reg) { 
5 if ($4 >- -8 && $4 < 0) { 

subabi8++ 
nxtc ( ) 

} 

if {$4 >= 1 && $4 <= 8) { 
10 addabi8++ 
nxtc ( ) 

} 

} 

if ($3 ~ "%fp") { 
15 if ($4 >= -32 && $4 < 0) { 

addfpi32++ 
nxtc ( ) 

} 

} 

20 if ($3 - / A %r([12] [0-9])/ && $4 >= -512 && $4 < 512) 

addrpc++ 
nxtc ( ) 

P > 

| 25 nxt() 

□ if ($2 ~ reg &S $3 ~ reg && $4 ~ reg) { 

QJ addrrr++ 
f nxtc ( ) 

3 30 } 

4i $1 == "sub" { 

if ($4 - / A -?[0-9]/) { 
subi++ 
35 if ($2 == $3) { 

# subia[$4]++ 
if ($3 - reg) { 
4« if ($4 >= -32 && $4 < 0) { 

PS addi32++ 
40 nxtc { ) 

} 

if ($4 >= 0 && $4 < 32) { 
subi32++ 
nxtc ( ) 

45 } 
} 

} 

if ($2 - reg) { 
if ($3 - reg) { 
50 if ($4 >= -8 && $4 < 0) { 

addabi8++ 
nxtc ( ) 

} 

if ($4 >= 1 && $4 < 8) { 
55 subabi8++ 
nxtc ( ) 

} 

} 

} 

60 nxt ( ) 

} 

if ($2 == $3 && $2 == ($4 ",")) { 
if ($2 - reg && $3 - reg && $4 - reg) { 
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subaaa++ ' 
nxtc ( ) 

} 

if ($2 ~ regh && $3 - regh && $4 - regh) { 
5 subhhh++ 
nxtc ( ) 

} 

} 

if ($2 - reg) { 
10 subr++ 

if {$2 == $3) { 
if ($2 ~ reg && $3 - reg && $4 ~ reg) { 
subaab++ 
nxtc ( ) 

15 } 

if ($2 ~ reg && $3 ~ reg && $4 ~ regh) { 
subrrh++ 
nxtc ( ) 

} 

20 if ($2 ~ reg && $3 ~ regh && $4 ~ reg) { 

subrrh++ 

0 nXtC < } 

f } } 

§Jj 25 if ($3 ~ reg && $4 - reg) { 
ijjj subrrr++ 

m nxtc() 

?* } 

ri« nxt" ( ) 

S § 30 } 
} 

e $1 == "sub.f" { 

Q if {$2 -= "0,") { 

if ($3 - reg && $4 - reg) { 
35 cmpr++ 
nxtc ( ) 

*F } 

p if ($4 ~ /^-?[0-9]/) { 

hit cmpi++ 

40 # cmpia[$4]++ 

if ($3 ~ reg) { 
if ($4 >= 0 && $4 < 64) { 
cmpi64++ 
nxtc ( ) 

45 } 

if (pete) { 
if ($3 ~ regOl && $4 >= 0 && $4 < 128) { 
cmpi64p++ 
nxtc ( ) 

50 } 

if ($3 ~ reg23 && $4 >= 0 && $4 < 64) { 
cmpi64p++ 
nxtc ( ) 

} 

55 if ($3 ~ reg!316 && $4 >= 0 && $4 < 32) { 

cmpi64p+-f 
nxtc ( ) 

} 

} 

60 } 

nxt () 

} 

if ($3 - reg) { 
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if ($4 ~ regh) { 
cmprh++ 
nxtc { ) 

} 

5 } 

if ($3 - regh) { 
if ($4 - reg) { 
cmphr++ 
nxtc { ) 

10 } 

} 

} 

nxt () 

} 

15 $1 == "sub.ne" { 

if ($2 == $3 && $2 == ($4 ",") ) { 
if ($4 - reg && $2 - reg && $3 - reg) { 
subneaaa++ 
nxtc { ) 

20 } 
} 

41 nxt < ) 

W } 

4) $1 ~ "sub.eq" { 

Oj 25 if ($2 == $3 && $2 ~ ($4 ",")) { 

P if ($4 ~ reg && $2 - reg && $3 ~ reg) { 

«^ subeqaaa++ 

% nxtc() 

4* } 

& 30 } 

i% } nxt <> 

L $1 ™ "asl" { 

U if ($4 - / A -?[0-9]/) { 

yj 35 asli++ 

if ($2 == $3) { 
j'« # aslia[$4]++ 

if {$3 ~ reg) { 
M if ($4 >= 1 && $4 <= 8) { 

H 40 asli8++ 
} 

if ($4 >= 1 && $4 < 32) { 
asli32++ 

} 

45 nxtc ( ) 

} 

} 

if ($2 ~ reg) { 
if ($3 ~ reg && $4 >== 2 && $4 < 3) { 
50 aslab2++ 
nxtc { ) 

} 

} 

nxt () 

55 } 

if ($4 ~ reg && $2 - reg && $3 ~ reg) { 
aslaab++ 
nxtc ( ) 

} 

60 if ($2 - reg && $3 - reg && $4 !- reg) { 
aslabl++ 
nxtc ( ) 

} 
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} 

$1 == "asr" { 
if ($4 - / A -?[0-9]/) { 
asri++ 
5 if ($2 == $3) { 

# asria[$4]++ 

if ($3 - reg) { 
if ($4 >= 1 && $4 <= 8) { 
asri8++ 

10 } 

if ($4 >= 1 && $4 < 32) { 
asri32++ 

} 

nxtc ( ) 

15 } 

} 

if ($2 - reg) { 
if ($3 - reg && $4 >= 2 && $4 < 3) { 
asrab2++ 
20 nxtc ( ) 

} 

> 

M nxt ( ) 

& } 

25 if ($4 - reg && $2 ~ reg && $3 - reg) { 

P% asraab++ 

at nxtc() 

if ($2 ~ reg && $3 - reg && $4 !~ reg) { 
01 30 asrabl-H-f 
•Jh nxtc() 

5 } 

fe,f $1 == "lsr" { 

yj 35 if ($4 ~ / A -?[0-9]/) { 

y% lsri++ 

if ($2 == $3) { 

# lsria[$4]++ 
W if ($3 ~ reg) { 

f*> 40 if ($4 >= 1 && $4 <= 8) { 

lsri8++ 

} 

if ($4 >« 1 && $4 < 32) { 
lsri32++ 

45 } 

nxtc ( ) 

} 

} 

if ($2 - reg) { 
50 if ($3 ~ reg && $4 >= 2 && $4 < 3) { 

lsrab2++ 
nxtc ( ) 

} 

} 

55 nxt() 
} 

if ($4 - reg && $2 ~ reg && $3 - reg) { 
lsraab++ 
nxtc ( ) 

60 } 

if ($2 - reg && $3 - reg && $4 !- reg) { 
lsrabl++ 
nxtc ( ) 
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} 

} 

$1 == »mul64" { 
if ($2 == "0,"} { 
5 if ($4 - / A -?[0-9]/) { 

muli++ 

# mulia[$4]++ 

if ($3 - reg) { 
if ($4 >= 0 && $4 < 32) { 
10 muli32++ 
nxtc ( ) 

} 

} 

} 

15 if ($3 ~ reg && $4 ~ reg) { 

mul0ab++ 
nxtc ( ) 

} 

} 

20 nxt ( ) 

} 

□ $1 == "and.f" { 

l0 if ($2 == "0,") { 

m if ($4 - [0-9] /) { 

atL 25 andfi++ 

# andfia[$4]++ 
OJ if ($3 ~ reg) { 

4* if ($4 >= 0 && $4 < 32) { 

fii andfi32++ 
^ 30 nxtc ( ) 

i 

} 

|j if ($3 ~ reg && $4 - reg) { 

35 andfab++ 
nxtc ( ) 

□ ) 

U% nxt ( ) 

40 } 

$1 == "and" { 

if {$2 == $3 M $2 == ($3 ",") || $2 =- ($4 ",»)) { 
if ($4 ~ / A -?[0-9]/) { 
andi++ 
45 # andia[$4]++ 

if ($3 - reg) { 
if ($4 >= 0 && $4 < 32) { 
andi32++ 
nxtc ( ) 

50 } 

} 

} 

if ($2 - reg && $3 - reg && $4 ~ reg) { 
andaab++ 
55 nxtc ( ) 

} 

} 

if ($2 ~ reg && $3 ~ reg && $4 - reg) { 
andrrr++ 
60 nxt ( ) 

} 

} 

$1 == "extb" { 
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if ($2 ~ ($3 ",")) { 
if ($2 - reg && $3 - reg) { 
extbr++ 
nxtc ( ) 

5 } 

} 

nxt () 

} 

$1 == "extw" { 
10 if ($2 « {$3 ",")) { 

if {$2 - reg && $3 - reg) { 
extwr++ 
nxtc ( ) 

} 

15 } 

nxt () 

} 

$1 == "sexb" { 
if ($2 == {$3 ",")) { 
20 if ($2 ~ reg && $3 - reg) { 

sexbr++ 
f% nxtc ( ) 

.a* * 

\s2 } 

81 25 nxt ( ) 

Q ) 

Q1 $1 == "sexw" { 

if ($2 == ($3 ",")) { 
J' if ($2 ~ reg && $3 - reg) { 

£N 30 sexwr++ 
4i nxtc ( ) 

e > 

f 5 ?*- } 

H nxt ( ) 

Mi 35 } 

($2 == $3 || $2 ™ ($3 ",") il $2 == ($4 ",")) ( 

if ($1 == "add" M $1 == "sub" | I $1 == "and" I ! $1 == "or" M $1 "xor" | | 
$1 == "asl" ! I $1 == "asr" II $1 == "lsr") { 
if {$2 - reg) { 
40 if ($2 $3) { 

if ($4 ~ reg) { 
opaab[$l]++ 
nxtc ( ) 

} 

45 } else { 

if ($3 ~ reg && $2 = ($4 ",")) { 
opaab [$!]++ 
nxtc ( ) 

} 

50 } 



in -a 



} 



} 

} 

55 { 

nxt () 

# print $0 
} 

60 END { 

if (1) { 
OFS - "\t" 

# print "\nopaab" 
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for (i in opaab) { 
if (i ~ "add" I I i == "sub" I I i =- "and" I I i -= "or" | | i 
»asl" I | i == "asr" ) I i == "lsr") { 

print i, opaab [i], int (opaab [i] *1000/NR) /10 

} 

} 

# print "\nldfpa" 

# for (i in ldfpa) print i, ldfpa[i] 

# print "\nstfpa" 

# for (i in stfpa) print i, stfpa[i] 

# print "\nldrOa" 

# for (i in ldrOa) print i, ldrOafi] 

# print "\nmovia" 

# for (i in movia) print i, movia[i] 

# print "\naddia" 

# for (i in addia) print i, addia[i] 

# print "\nsubia" 

# for (i in subia) print i, subia[i] 

# print "\ncmpia" 

# for (i in cmpia) print i, cmpiafi] 

for (i in calls) { 

# print i, callsfi] 
if (callsfi] > 1) { 

calls2 += (calls[i]-2) 

} 

callsall += calls [i] 

} 

# print "callsall", callsall, int (callsall*1000/NR) /10 

# print "calls2", calls2, int (calls2*1000/NR) /10 

# bl = calls2 
bl = bl - push 
b = b - pop 

print "bl", bl, int {bl*1000/NR) /10 

# print "push", push, int (push*1000/NR) /10 

print "b", b, int (b*1000/NR) /10 

# print "pop", pop, int {pop*1000/NR) /10 
print "beq", beq, int (beq*1000/NR) /10 
print "bgt", bgt, int (bgt*1000/NR) /10 
print "bhi", bhi, int (bhi*1000/NR) /10 
print "bpl", bpl, int (bpl*1000/NR) /10 

print "stblink", stblink, int (stblink*1000/NR) /10 

print "jblink", jblink, int ( jblink*1000/NR) /10 

print "jr", jr, int ( jr*1000/NR) /10 

print "jlr", jlr, int ( j lr*1000/NR) /10 

print "movr", movr, int (movr*1000/NR) /10 

print "movfOr", movfOr, int (movf 0r*1000/NR) /10 

print "movf Oh", movfOh, int (movf 0h*1000/NR) /10 

print "movrh", movrh, int (movrh*1000/NR) /10 

print "movhr", movhr, int (movhr*1000/NR) /10 

print "cmprh", cmprh, int (cmprh*1000/NR) /10 
print "cmphr", cmphr, int (cmphr*1000/NR) /10 
print "cmpr", cmpr, int (cmpr*1000/NR) /10 

print "cmpi64", cmpi64, int (cmpi64*1000/NR) /10 

print "cmpi64p", cmpi64p, int (cmpi64p*1000/NR) /10 

print "movi64", movi64, int (movi64*1000/NR) /10 

print "movi64p", movi64p, int (movi64p*1000/NR) /10 
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print 
print 

print 
print 

print 
print 

print 
print 
print 
print 
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print 
print 

print 

# print 
print 
print 
print 

print 

# print 
print 
print 
print 

print 

# print 
print 
print 
print 

print 
print 
print 
print 

print 
print 

print 
print 
print 
print 
print 
print 
print 
print 
print 
print 

print 
print 

print 
print 
print 



,, addi32", addi32, int (addi32*1000/NR) /10 
'subi32", subi32, int (subi32*1000/NR) /10 

addabi8", addabi8, int (addabi8*1000/NR) /10 
subabi8", subabi8, int (subabi8*1000/NR) /10 

subneaaa", subneaaa, int (subneaaa*1000/NR) /10 
subeqaaa", subeqaaa, int (subeqaaa*1000/NR) /10 



subhhh", 
subaaa" , 
subaab", 
subrrr", 
addaab", 
addrrr", 
addrrh", 



subhhh, 
subaaa, 
subaab, 
subrrr, 
addaab, 
addrrr, 
addrrh, 



int (subhhh* 
int (subaaa* 
int (subaab* 
int (subrrr* 
int (addaab 
int (addrrr 
int (addrrh 



1000/NR) /10 
1000/NR) /10 
1000/NR) /10 
1000/NR) /10 
*1000/NR) /10 
*1000/NR) /10 
*1000/NR) /10 



'asli8", asli8, int (asli8*1000/NR) /10 
n asli32", asli32, int (asli32*1000/NR) /10 
'aslabl", aslabl, int (aslabl*1000/NR) /10 
'aslab2", aslab2, int (aslab2*1000/NR) /10 
'aslaab", aslaab, int (aslaab*1000/NR) /10 

'asri8", asri8, int (asri8*1000/NR) /10 
"asri32", asri32, int (asri32*1000/NR) /10 
asrabl", asrabl, int (asrabl*1000/NR) /10 
asrab2", asrab2, int (asrab2*1000/NR) /10 
asraab", asraab, int (asraab*1000/NR) /10 

lsri8", lsri8, int (Isri8*1000/NR) /10 
"lsri32", lsri32, int (Isri32*1000/NR) /10 
lsrabl", lsrabl, int (lsrabl*1000/NR) /10 
lsrab2", lsrab2, int (Israb2*1000/NR) /10 
lsraab", lsraab, int (lsraab*1000/NR) /10 

andi32", andi32, int (andi32*1000/NR) /10 
andfi32", andfi32, int (andf i32*1000/NR) /10 
andaab", andaab, int (andaab *1000/NR)/10 
andfab", andfab, int (andfab *1000/NR)/10 

mulOab", mulOab, int (mulOab *1000/NR) /10 
muli32", muli32, int (muli32 *1000/NR) /10 



ldabc", t 

ldbabc", 

ldwabc", 

ldr64'\ 

ldr64p", 

ldwr32", 

ldbrl6", 

str64", 

stbr8", 

stwrl6", 

ldrpc", 
addrpc", 



ldabc, intddabc *1000/NR) /10 
ldbabc, int (ldbabc *1000/NR) /10 
ldwabc, int (ldwabc *1000/NR) /10 

ldr64, int(ldr64 *1000/NR)/10 
ldr64p, int(ldr64p *1000/NR)/10 
ldwr32, int(ldwr32 *1000/NR)/10 
ldbrl6, int(ldbrl6 *1000/NR)/10 

str64, int(str64 *1000/NR) /10 

stbr8, int(stbr8 *1000/NR) /10 
stwrl6, int(stwrl6 *1000/NR)/10 

ldrpc, int (ldrpc *1000/NR) /10 
addrpc, int(addrpc *1000/NR)/10 



ldfp32 n , ldfp32, int (Idfp32*1000/NR) /10 
stfp32", stfp32, int (stfp32*1000/NR) /10 
addfpi32 M , addfpi32, int (addfpi32*1000/NR) /10 



print "ldgp", Idgp, int (ldgp*1000/NR) /10 
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print "stgp", stgp, int (stgp*1000/NR) /10 

print "extbr", extbr, int (extbr*1000/NR) /10 

print "extwr", extwr, int (extwr*1000/NR) /10 

print "sexbr", sexbr, int (sexbr*1000/NR) /10 

print "sexwr", sexwr, int (sexwr*1000/NR) /10 



10 



15 



# print "movi", movi, "movi64", movi64, "movil28" / movil28 

# print "addi", addi, "addi32", addi32, "addi64", addi64, "addil28", addil28 

# print "subi", subi, "subi32", subi32, "subi64", subi64, "subil28", subil28 
} 

} 

#function p(a, b) { 

# print "a", b, int (b*100/NR) 
#} 



20 



#/ 

# 

# 

# 

# 

# 

# 

#} 
# 

#{ 



(jljllbibl) (ge!gt|le|lt|ne|eq|pl|mi|hi|hs|lo|ls)?\.d/ { 
stored = $0 

sub<A.d/, "", stored) 

getline 

print $0 

print stored 

nxtc ( ) 



print $0 } 
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